home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Shareware Overload Trio 2
/
Shareware Overload Trio Volume 2 (Chestnut CD-ROM).ISO
/
dir39
/
clipboot.zip
/
INCLUDE1.H
< prev
next >
Wrap
C/C++ Source or Header
|
1993-05-03
|
3KB
|
81 lines
/*┌──────────────────────────────────────────────────────────────────────┐
▌│ Program Name: INCLUDE1.H Copyright: Gallagher Computing Corp. │
▌│ Language: Clipper 5.2 Author: Kevin S Gallagher │
▌├──────────────────────────────────────────────────────────────────────┤
▌│ Comments: │
▌│ When ready for production undefine TRIAL_ME_OUT │
▌│ To use grump.lib - define MR_GRUMP and include grump.lib in the │
▌│ link file. │
▌└──────────────────────────────────────────────────────────────────────┘
▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀ */
#include "box.ch"
#include "inkey.ch"
#include "memoedit.ch"
#ifdef MR_GRUMP
#include "grump.ch"
#endif
#define TRIAL_ME_OUT
#ifdef TRIAL_ME_OUT
#define Q_FILE "QBOOT.DAT"
#define AUTOFILE "AUTOEXEC.KSG"
#define CONFFILE "CONFIG.SYS"
#else
#define Q_FILE "C:\QBOOT.DAT"
#define AUTOFILE "C:\AUTOEXEC.BAT"
#define CONFFILE "C:\CONFIG.SYS"
#endif
#ifndef MR_GRUMP
#xtranslate AKill( <a>, <e> ) => ;
asize( adel( <a>, <e> ), len( <a> ) - 1 )
#xtranslate CENTER(<row>, <msg> [, <color> ] ) => ;
SetPos( <row>, int(( maxcol()+1 - len(<msg>)) / 2)) ; ;
DispOut( <msg> [, <color>] )
#endif
#xtranslate LSTRINT( <n> ) => ;
ltrim( str( int( <n> ) ) )
#xtranslate ISCHAR( <v> ) => ;
( valtype( <v> ) == "C" )
#xtranslate Center(<row>, <msg> [ , <color> ] ) => ;
DevPos( <row>, int((maxcol() + 1 - len( <msg> )) / 2)) ; ;
DevOut( <msg> [, <color>] )
#define blocks_ { | x , y | x[1] < y[1] }
#define MR maxrow()
#define MC maxcol()
#define SHORTY 20
#define FO_READWRITE 2
#define NEW_LINE chr(13)+chr(10)
#define SaveFullScreen() oldscrn := savescreen(0,0,maxrow(),maxcol())
#define RestFullScreen() restscreen(0,0,maxrow(),maxcol(),oldscrn)
#define SYS_COLOR {"W+/B","W/B","GR+/B","B/BG,W+/B","W/N","RB+/B",;
"W+/R","W/B,W+/BG" }
#define MENUCOLOR SYS_COLOR[4]
#define GETCOLOR SYS_COLOR[2]
#define DISPCOLOR SYS_COLOR[2]
#define SAYCOLOR SYS_COLOR[1]
#define HICOLOR SYS_COLOR[3]
#define BACKCOLOR SYS_COLOR[1]
#define DOSCOLOR SYS_COLOR[5]
#define ENCHCOLOR SYS_COLOR[6]
#define ERRCOLOR SYS_COLOR[7]
#define EDCOLORS SYS_COLOR[8]
#define SHOW_INFO aQboot_[nSubs][3]
#define PSEUDO_NAME 3
#define LONG_DESC 4